home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
filutil
/
pa_st270.zip
/
START.BAT
< prev
next >
Wrap
DOS Batch File
|
1995-02-01
|
1KB
|
59 lines
@ECHO OFF
ECHO OFF
IF (%1) == (@) GOTO %2
REM Save video state
SV S
:MAIN
GO-MENU START.MNU 000 GO-MENU.SAV
IF ERRORLEVEL 10 GOTO QUIT
IF ERRORLEVEL 5 GOTO DISPLAY
IF ERRORLEVEL 4 GOTO SHARE
IF ERRORLEVEL 3 GOTO EXAMPLES
IF ERRORLEVEL 2 VIEW CHANGE.LOG MAIN
IF ERRORLEVEL 1 VIEW POM.DOC MAIN
:SHARE
GO-MENU SHARE.MNU 020 GO-MENU.SAV
IF ERRORLEVEL 10 GOTO MAIN
IF ERRORLEVEL 7 VIEW VENDOR.DOC SHARE
IF ERRORLEVEL 5 VIEW AMAZE.TXT SHARE
IF ERRORLEVEL 4 VIEW AMAZE.DOC SHARE
IF ERRORLEVEL 2 VIEW ORDER.FRM SHARE
IF ERRORLEVEL 1 VIEW OPTIONS.DOC SHARE
:EXAMPLES
GO-MENU EXAMPLES.MNU 010 GO-MENU.SAV
IF ERRORLEVEL 10 GOTO MAIN
IF ERRORLEVEL 9 EXAMPLE 9 T 9 DBF
IF ERRORLEVEL 8 EXAMPLE 8 L 3 TXT
IF ERRORLEVEL 7 EXAMPLE 7 T 7 TXT
IF ERRORLEVEL 6 EXAMPLE 6 P 6 TXT
IF ERRORLEVEL 5 EXAMPLE 5 P 5 TXT
IF ERRORLEVEL 4 EXAMPLE 4 T 4 TXT
IF ERRORLEVEL 3 EXAMPLE 3 T 3 TXT
IF ERRORLEVEL 2 EXAMPLE 2 P 2 TXT
IF ERRORLEVEL 1 EXAMPLE 1 P 1 TXT
:DISPLAY
GO-MENU DISPLAY.MNU 030 GO-MENU.SAV
IF ERRORLEVEL 10 GOTO MAIN
IF ERRORLEVEL 3 GOTO DISPXGA
IF ERRORLEVEL 1 GOTO DISPSTD
:DISPSTD
SV K OK
GOTO MAIN
:DISPXGA
SV V OK
GOTO MAIN
:QUIT
SV R
CLS
IF NOT EXIST SERIAL#.PAX DONE - X